## Simulate 10,000 random draws from a standard normal dist
std_norm <- rnorm(n = 10e3, mean = 0, sd = 1)
## Print a summary
summary(std_norm) Min. 1st Qu. Median Mean 3rd Qu. Max.
-4.130991 -0.679516 -0.001870 0.006282 0.691634 4.395782